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INTRODUCTION 


THIS IS THE SECOND BOOKLET WITH THE SAME TITLE AND 
THE SAME BASIC SET OF INTENTIONS. THE RESPONSE TO 
BOOK 1 MAKES IT OBVIOUS THAT THERE IS A CONSIDERABLE 
DEMAND FOR THIS SORT OF INTRODUCTORY TEXT/ ’DEDICATED* 
TO A SPECIFIC MACHINE. WHILE THERE IS NO DOUBT 
AT ALL THAT/ WITHIN ITS SELF-EVIDENT LIMITATIONS/ 

PET IS A MOST USEFUL AND RELIABLE INSTRUMENT/ IT IS 
TRUE ALSO THAT THE SUPPORTING DOCUMENTATION AND 
EXPLANATORY LITERATURE IS QUITE INADEQUATE. 

IT MAY WELL BE THAT THE PROVISION OF THIS SORT 
OF BACK-UP WILL ALWAYS LAG BEHIND THE HARDWARE 
PROVISION AND THAT SATISFACTORY LITERATURE MUST 
ALWAYS WAIT FOR THOSE WHO HAVE SPENT THE LONG HOURS 
TESTING ITS LIMITS ITS BOUNDARIES ITS QUIRKS. 

AS BEFORE THIS BOOKLET REFERS TO THE BASIC 4K OR 8K 
MACHINE WITH ONE CASSETTE TAPE-RECORDER/ AND NO 
ASSUMPTIONS ARE MADE ABOUT OTHER POSSIBLE 
ENHANCEMENTS. IT IS EXPECTED THAT ALL OF THE 
CONTENTS WILL WORK WITH THE NEW LARGE MACHINE? 

BUT VE WOULD BE INTERESTED TO KNOW OF ANY 
DIFFICULTIES ENCOUNTERED WITH THESE. * 

SOME OF THOSE WHO WROTE TO US ABOUT BOOK ONE 
FELT THAT THE PROGRAMMING SKILLS DEMANDED'^ERE 
A BIT TOC DIFFICULT FOR BEGINNERS. SO VSl 
RE-EMPHASISE HERE THAT VE DO NOT INTEND T# TEACH 
•BASIC* EXCEPT INCI DEN TALLY AND HOPE THAT) ANY 
USERS WILL HAVE A GOOD ’BASIC* TEXT AVAILABLE. 

ONCE AGAIN THE PRINTER WHICH VE USED PLACED SOME 
RESTRICTIONS ON THE CLARITY AND PRESENTATI ON OF 
SOME OF THE PET SYMBOLS AND GRAPHICS. THIS PROBLEM 
WAS PARTICULARILY DIFFICULT IN THE CHAPTER ON 
CURSOR FUNCTIONS AND CURSOR MOVEMENTS. SOME 
OF THE LITERATURE PRODUCED AEQUT PET HAS SUGGESTED 
VARIGUS WAYS OF PRESENTING THESE AND TH15 VARIETY 
WILL EITHER SETTLE DOWN INTO A STANDARD OR EECOME 
UNNECESSARY WHEN THE PET PRINTER IS WIDELY AVAILABLE. 
IN THE MEANTIME OUR DECISION WAS TO TRY/ AS FAR AS 
POSSIBLE/ TO COPY THE ACTUAL GRAPHICS AS PRODUCED 
BY PET ITSFLF. WE ACCEPT THAT THIS IS NOT ALWAYS 
A GREAT SUCCESS. 



THERE ARE A CHAPTERS WHICH ARE MOW DESCRIBED IN 
BROAD OUTLINE! 

CHAPTER I. PROGRAMMING CURSOR FUNCTIONS. 

***************************************** 


THIS SHOWS HOW THESE SPECIAL PET KEYS ARE USED, 
HOW THEY CAN BE BUILT INTO INPUT AND OUTPUT 
INSTRUCTIONS AS FORMATTING DEVICES, AND HOW 
THEY CAN BE USED AS WAYS OF LOCKING PART 
OF THE SCREEN. 

CHAPTER 2. DATA CHUNKING ON SCREEN. 

************************************ 


THIS DEVELOPS A ROUTINE TO DO ONE OF THOSE 
USEFUL THINGS THAT SOME OTHER MACHINES HAVE 
BUILT IN AS NORMAL. IT ALLOWS THE USER TO AVOID 
THAT IRRITATING SITUATION WHERE A SET OF LINES 
OF DATA RUN OFF THE TOP OF THE SCREEN. 

CHAPTER 3. PEEK AND POKE. 
************************** 


THIS WAS ORIGINALLY THE TITLE OF A CHAPTER IN 
BOOK ONE, BUT VE RECEIVED SO MANY COMPLAINTS 
ABOUT THE ABSENCE OF ANYTHING ABOUT PEEK IN 
IT, THAT IT WAS RENAMED °OKE IN THE SECOND 
EDITION. THIS NEW CHAPTER DOES MAKE USE OF 
BOTH OF THESE INTERESTING AND USEFUL IDEAS. 

CHAPTER A. STRINGS. 

******************** 


THE VERSION OF BASIC USED IN PET HAS A VERY 
POWERFUL SET OF STRING FUNCTIONS AND SOME 
ASPECTS OF THESE ARE SPECIFIC TO PET. 

ALSO, LITERATURE ON THE USE OF THESE FUNCTIONS 
IS NOT ALL THAT WIDESPREAD OR AVAILABLE. THIS 
CHAPTER TRIES TO MAKE SOME OF THEM EASY TO 
UNDERSTAND AND USE. 


0 



a e- 


AT THE BACK THERE IS A SET OF SEVEN DIAGRAMS. THE 
FIRST FIVE OF THESE ARE EXACTLY THE SAME AS THOSE 
IN BOOK 1. THEY HAVE BEEN INCLUDED HERE ALSO BOTH 
3ECAUSE THEY ARE MUCH REFERRED TO IN THE TEXT AND 
BECAUSE THEY HAVE BEEN PERHAPS THE MOST APPRECIATED 
ASPECT OF BOOK 1. 

THE TWO NEW DIAGRAMS ARE: 


DIAGRAM 6. 

********** 

THIS GIVES THE SET OF NUMBERS AND THEIR ASSOCIATED 
CHARACTERS USED BY THE ' CHR£. * FUNCTION. 


DIAGRAM 7. 

********** 

THIS TRIES TO MAKE CLEAR THE APPEARANCE* 
LOCATION AND EFFECT OF THE CURSOR-MOVEMENT 
AND OTHER SPECIAL KEYS. 


THE AUTHORS WOULD* ONCE AGAIN* BE GRATEFUL FOR 
INFORMATION ABOUT ANY MISTAKES* AMBIGUITIES OR 
IFFI CULTIES OF UNDERSTANDING FOUND WITHIN 
i HI S TEXT. THEY WOULD ALSO BE GRATEFUL FOR PROPOSALS 
ABOUT HOW THIS BOOKLET MIGHT BE ADDED TO OR 
IMPROVED IN ANY WAY. 



PROGRAMMING CURSOR FUNCTIONS 

*«ats=2ssa=a25*itei:st3asasi 


SPECIAL KEYS 
************ 

THERE ARE 4 SPECIAL KEYS IN THE ’PET* KEYBOARD 
THAT CAUSE A GREAT DEAL OF CONFUSION. ON DIAGRAM 
1 , PAGE 3 b, THEY ARE NUMBERED 12,13,14 AND 60. 

(SEE COLUMNS 1 AND 2 IN DIAGRAM 7). WHEN 
PRESSED UNDER NORMAL CIRCUMSTANCES THEIR EFFECT -- 
EXCEPT FOR 60 -- IS TO MOVE THE CURSOR IMMEDIATELY. 

FOR EXAMPLE, PRESS KEY 13 AND THE 
CURSOR MOVES DOWN THE SCREEN. 

HOWEVER, ALL FUNCTIONS OF THESE KEYS ARE PROGRAMMABLE 
AND THIS MEANS THAT THEY DO NOT ACT IMMEDIATELY 
ON BEING PRESSED, BUT WAIT UNTIL THE PROGRAM 
IS RUN. THIS STORING UP PROCESS IS DONE BY 
PRESSING THESE KEYS WITHIN QUOTATION MARKS IN 
PRINT COMMANDS. EXAMPLE: PRESS KEY 13 


10 PRINT «Q“ 


THERE ARE A GREAT NUMBER OF POSSIBLE SOURCES 
OF CONFUSION NOW: 

FIRST . THE SIGNS MADE BY THESE KEYS WHEN 
PRESSED WITHIN QUOTATION MARKS ARE UNEXPECTED, 
SURPRISING, AND HAVE NO APPARENT LOGIC. 

FOR EXAMPLE, WHEN KEY 13 IS PRESSED, AS IN THE 
EXAMPLE ABOVE, A REVERSE FIELD Q APPEARS. 

(COLUMN 4 DIAGRAM 7). 


SECOND . THE STRANGE SYMBOLS USED BY ’PET* 

TO REPRESENT THESE CONTROL KEYS WITHIN PROGRAMS 
APPEAR ELSEWHERE ON THE PET KEYBOARD IN A 
NORMAL GUISE. THAT IS, FOR EXAMPLE THE *Q’ 




CONSIDER/ FOR EXAMPLE/ THIS PROGRAM 


10 

tl M M 

PRINT ▼ 



20 

FOR N=1 TO 

5: PRINT: NEXT 

U SPRINT 

30 

PRINT 1 ' 

THE EDUCATION CENTRE/ 

40 

print" 

THE NEW UNIVERSITY OF 

ULSTER/'* : PRINT 

50 

print" 

COLERAINE/ N • IRELAND." 



NOV TYPE IN * RUN * AND THEN * RETURN * 
THE SCREEN LOOKS LIKE THIS: 


THE EDUCATION CENTRE/ 

THE NEW UNIVERSITY OF ULSTER/ 
COLERAINE/N. IRELAND* 

READY 

1 


I 


HOWEVER/ USING THE CURSOR SYMBOLS VITKIN QUOTATION MARKS 
ALLOWS THE LINES 10/ £0 AND 30 TO BE INCORPORATED 
INTO ONE LINE -- THE NEW LINE IS BELOV* 






!0 PRINT "jp QQQQQ3 3 13111111 THE EDUCATION CENTRE,_q'‘ 

THIS IS NOV DESCRIBED IN SOME DETAIL. 

FIRST TYPE IN 10? AND THEN THE FOLLOWING: 


SHIFT AND KEY 12 

TO CLEAR SCREEN 

KEY 1 3, 5 TIMES 

TO MAKE A 5-LINE SPACE 

KEY 14, 10 TIMES 

TO MOVE CURSOR 10 


SPACES TO THE RIGHT 

THE EDUCATION CENTRE, 

THE ACTUAL WORDS 

KEY 13, ONCE 

TO MAKE A ONE LINE SPACE 

CLOSE QUOTATION MARKS 

LAST SYMBOL.PRESS RETURN 


TRY IT AND SEE. IT WORKS VERY EASILY. IF YOU GET INTO 
DIFFICULTIES, JUST PRESS # RETURN * AND BEGIN AGAIN. 

NOW THE REST: 


20 

PRINT 

“munniTHE new 

UNIVERSITY OF ULSTER, Q” 

30 

PRINT 

"nmiNNCOLERAIf] 

!E,N. IRELAND." 


NOV REMOVE LINES AO AND 50 AND RUN IT AGAIN. 

THIS TECHNIQUE IS PARTICULARILY USEFUL WHEN YOU ARE 
INVITING THE USER TO RESPOND OR ANSWER IN SOKE WAY. 
THE SHORT PROGRAM BELOW ASKS FOR THE NAME OF A BOOK 
AND ITS AUTHOR. 


too 

PRINT 

1 INPUT 

NAME 

OF 

book" 

1 1 0 

INPUT 

BL 




1 20 

PRINT 

M INPUT 

NAME 

OF 

AUTHOR" 

1 30 

INPUT 

At 





THIS WORKS VERY WELL BUT IT CAN BE MADE LESS CROWDED 
AND MORE ATTRACTIVE AS FOLLOWS: 









too INPUT ♦ iiUJJJLlPINJPUT NAME OF BOOK 33* p? 

120 INPUT 1 * QQ3 3 3 3 3R INPUT NAME OF AUTHOR 3 3*iIQgD*;Al 


NOV REMOVE LINES I2C AND 130 AND TRY THIS* 

\ THE USE OF 'REVERSE FIELD 5 V MSDLS* AND THE USE OF 
* CURSOR MOVEMENT SYMBOLS’ AFTER THE WORDS IN DOTK OF 
THESE LINES ARE EXPLAINED IN BOOK PAGE 7 AND 24>. 


IN THIS WAY WE CAN# WITHIN A PROGRAM* MOVE MESSAGES 

UP AND DOWN THE SCREEN -- KEY 13 DIAGRAM l 
LEFT AND RIGHT ON THE SCREEN -- KEY 14 DIAGRAM i 
CLEAR THE SCREE*! -« SHIFT AND KEY 15? 


IT IS NOT IMMEDIATELY OBVIOUS WHEN V£ MIGHT HAVE CAUSE 
TO PROGRAM THE ’HOME* KEY '.KEY !£, 13*SHIFTED) - 

A GOOD EX AM PI- E M13V FOLLOWS* 


SCREEN LOCKING 

************** 


IT IS OFTEN NECESSARY# ESPECIALLY IN GAMES# TO DRAW 
A PERMANENT PICTURE ON THE SCREEN# AND ALSO TQ KEEP 
GIVING INSTRUCTIONS. IN THE EXAMPLE BELOV THE PICTURE 
IS A SET OF S3 VAR EC DRAW ON THE FiJ: FTOtt PART OF THE 
SCREEN LEAVING THE TOP KEV LINES FOR INSTRUCTIONS. 


THE INSTRUCTION, 




CK 


TLY REFSATED# 


El 


0 R 


1 FIRST PLAY£R’S TURN 
1 S E C ON D PL AY ER ‘ *'■> *** ? * n*a 


RN s 


INPUT 1 CF 2 
INPUT H OR I 


UNFORTUNATELY IT ! 5 NOT POSSIBLE TO ’ LOCK * THE 
TOP OF THE SCREEN OF ’PET* , SO THE INSTRUCTIONS 
GRADUALLY DESCEND UPON AMD DESTROY THE PICTURE. 


RY IT AND SEE 




I 


JUS PH l NT "W " 

I ' " FCr- A*330OS TO 33766 STEP 9 
i 2 0 POEE A# 10 2 
i 3 0 U E>‘ ? 


200 INPUT 11 FIRST PLAY EH * 5 TURN? 
210 INPUT 41 SECOND PLAYER'S TURN 
220 GOTO 200 


DRAWS A 
PICTURE 


lit PUT \ on 2 3 3* HIKD U ; B 

t INPUT I on 233*3535*; B 


REPEATED INSTRUCTION 


CDF COURSE THE LOGIC OF THE PROGRAM IS NOT FOLLOWED 
THROUGH SINCE THE INPUTS ARE# FOR THE MOMENT# IGNOFE'U* 

TO CORRECT THE PROGRAM# TWO THINGS MUST BE DON £ * 

U REMOVE THE LINE OF INSTRUCTIONS EACH TIME 
AFTER THE PLAYER RESPONDS. THIS IS DOME BY 
5 POKING’ A ROW OF * SPACES * (REPRESENTED BY 
32) ACROSS THE TOP ROW* HERE WE PUT IT IN 
A SUBROUTINE. 


! 00 0 FOR C-32768 TO 326 07 

i010 RETURN 




I 


2. BEFORE EACH INSTRUCTION# MOVE TV £ CUP SO H 
TO THE TOP LINE AGAIN. TO DQ THIS U3K THE 
• •:OK E « KEY ( O UMBER 12 IM I> 1 AG RAM 1 ) i Yi PI D E TH £ 
CUOTA - ? CN MARKS IN LINES 200 AND 210. 

NOV; TYP’C THE 2 N £V LINES# 206 AM:? 21T-«. 

TUI. PRC GRAM U2V LOOKS LIKE THIS: 






100 

110 

120 

130 

PRINT** 

FOR A =33003 TO 33766 STEP 9 

POKE A,102 

NEXT 



DRAWS PICTURE (UNCHANGED) 


200 

205 

210 

215 

220 

INPUT f 'sFIRST PLAYER’S TURN: INPUT 1 OR 
GOSUB 1000 

INPUT u SSECOND PLAYER’S TURN:INPUT 1 OR 
GOSUB 1000 

GOTO 200 

25:* nrmr.-B 

2 H* firm 11 ; b 


REPEATED INSTRUCTION, ERASED EACH TIME 


1000 

1010 

FOR C= 32768 TO 32807:POKE C,32: NEXT 
RETURN 



ERASE ’SUBROUTINE* 



THE LINES ON THE TOP CHANGE SO QUICKLY THAT WE FIND 
IT DISCONCERTING, SO WE INSERT A ’SLOW DOWN* LINE: 


1 005 FOR D=1 TO 500 : NEXT 






DATA CHUNKING ON SCREEN 

SB3SSS3S2S333XX2SSX33XX 


THERE ARE 25 P OVS ON THE ’PET* SCREEN. WHEN TRYING TO 
READ A LONG PROGRAM, THEREFORE, IT IS NECESSARY TO BREAK IT 
UP INTO ^‘CHUNKS * OF ABOUT 20 LINES EACH. (SEE BOOK 1, 

PAGE 5). t 

IF YOU WISH TO READ A LARGE NUMBER OF LINES OF DATA OR 
INFORMATION, STORED BY A PROGRAM IN MEMORY, THEN IT IS 
NECESSARY TO FIND A METHOD FOR PRESENTING THIS IN CHUNKS. 

BEGIN BY ENTERING A LIST OF 50 BOOKS AND THEIR AUTHORS 
AS IN ’SUB-PROGRAM 1* BELOW. IN THIS CASE N WILL BE 50. 
(THERE ARE A NUMBER OF CURSOR CONTROL SYMBOLS INCLUDED. 
THESE ARE DESCRIBED ON PAGE 7-) 


SUB-PROGRAM 1 

************* 


100 DIM AE(100),BE( 100) 

110 INPUT "^QGlil HOW MANY BOOKS ]) *CTTTnl *:N 

120 FOR Z*1 TO N _ 

130 INPUT u QQl ) ) ] N AM E OF AUTHOR ])* (ECEI At ( Z ) 
1 A 0 INPUT “ QQJJJJNAME OF BOOK ) 1 ♦ CgCD ** 1BL(Z) 
150 NEXT 

160 PRINT M LAST ONE NOV ENTEREDQQQ U 


NOW VE WISH TO READ THIS LIST ON THE SCREEN. 
A FIRST ATTEMPT 

SUB-PROGRAM 2 

************* 


200 

INPUT *01)0 

YOU WISH 

TO READ LIST 

]*irnrn";xi 

210 

IF Xi* |, N M 

THEN 7 \ 0 




220 

IF Xl=*Y" 

THEN 400 


THIS SETS 


230 

PRINT TRY AGAIN 

: GOTO 200 

UP QUESTION 








SUB-PR3GR&M 4 


«00 

AiO 

FOR Z>! TO N 

PRINT z; Ai<£>,BE<2: 

1 THIS PRINTS DATA j 

1 

| 

i 

i 

420 

HEX? 

! CM SCREEN | 

1 

430 

gosus no0 


j 

44 0 

GOTO 700 


i 

J 


SUB-PROGRAM ? 
***a********* 


r--—— --— - 

I 730 ?WINT 51 3lTKAT WAS '-AST CWES'* ftHIS BRIWGa’ ., 
j 710 24 D jTHIMOS TO A.V •’ KC'ij 



St'B-ROCTIME 


1 0 SO 
i 0 i £ 
1050 


PRINT’ 
GET Tit 
RETURN 


3 3 n 3 1 2 nPRESS AMY KEY g F HVf t s'MAKES THE j 
IF «•£» *• w THEM I 01 O' ! PROGRAM STOP » 


TYPE ALL THIS I'M AND TRY IT* YOU tfitL KINO THAT? WITH 
5 0 BOCKS MOST OF THE INFORMATION D* SAPPEARS OFF THE TOP OF 
THE SCREEN* £DON? VPftRY ABOUT THE MISSING SUE-PROCiKANS* 
TKtY 00 TURN OP LATER)* 

?;- solve this problem ys must break the list gf n socks 

INTO DAMAGEABLE CHUNKS OF 2G EACH? AND THEM PRESENT EACH 
C HUNK Civ Trig SCFSIN* 




FIRST, HQV MANY 20'S ARE THERE IN N? 


TO MEASURE THIS, USE 
THAT IS, P IS THE 


P = INT C N/20 ) 


* WHOLE NUMBER PART* OF 

* N DIVIDED BY 20 *. 


THERE ARE NOV 3 CASES TO CONSIDER: 

CASE 1 . N IS LESS THAN 20* IN THIS CASE P*0. 

CASE 2 » N IS AN EXACT NUMBER OF 20’ S. 

CASE 3 . N IS AN EXACT NUMBER OF 20*S 

PLUS AN EXTRA SET LESS THAN 20- 

IN CASE 1 THE PRINT TO THE SCREEN IS AS GIVEN IN 
SUB-PROGRAM A* 


IN CASE 2 VE MUST USE A DOUBLE-LOOP. THE INSIDE LOOP 
COUNTS TO 20 EACH TIME AND REPRESENTS A SCREEN-FUL 
OF INFORMATION. THE OUTSIDE LOOP COUNTS THE NUMBER 
OF 20 *S OR THE NUMBER OF SCREENFULS. IT WILL COUNT 
TO P. (THE LAST LINE IS NEEDED FOR CASE 3, DESCRIBED 
IN A MOMENT). 


SUB-PROGRAM 5 

************* 


500 

FOR Y*1 TO P 


510 

FOR Z = 1+20*(Y- 

1) TO 2 Q*Y 

520 

PRINT Zi A£(Z>, 

B£CZ) 

530 

NEXT Z 


540 

GOSUB 1000 


550 

NEXT Y 


560 

IF N*20*P THEN 

700 


CASE 3 IS A MIXTURE OF CASES 1 AND 2 SO VE NEED BOTH 
FORMS OF PRINT-OUT. FIRST SUB-PROGRAM 5, AND THEN 
AN AMENDED VERSION OF SUB-PROGRAM A TO BE 
CALLED SUB-PROGRAM 6. 





SUB-PROGFAM .6 

************* 


600 FOR Z- 1+20*P TO N 
610 PRINT Z; ALCZ># BLCZ) 
620 NEXT Z 


WE ALSO NEED A TEST # QUITE EARLY IN THE PROGRAM# 
TO FIND OUT WHICH CASE VE ARE DEALING WITH. 


SUB-PROGRAM 3 

************* 


300 P = INTCN/20) 

310 IF P = 0 THEN 400 
320 GOTOSOO 


THIS MEANS VE MUST CHANGE LINE 220 IN SUB-PROGRAM 2- 


220 IF X£=* " Y" THEN 300 


THE WHOLE PROGRAM IS NOV PRINTED AS A UNIT. 
A GREAT NUMBER OF OTHER THINGS CAN BE DONE 
TO THIS NOV. IN PARTICULAR A ROUTINE FOR 
STORING INPUT ON TAPE WOULD SAVE A LOT 
OF REPEATED TYPING IN OF DATA. 

(SEE BOOK l# CHAPTER 4 >. 






1 00 DIM At< 100); BU 1 00) 

110 INPUT "j» QQin HQV MANY BOOKS 3 3 * CUD"; N 
1 20 FOR Z 1 TO N 

130 INPUT M QQVnjNAME 0F AUTHOR 3 1 ♦ fTTHl H : A i ( 7. > 

mo input “ oornjNAME of BOOK n *tnnrr u ; bkz) 

150 NEXT 

160 PRINT "LAST ONE NOW ENTEREDQQQ" 


2 C 0 IN PUT *0.1)0 YOU WISH TO READ LIST (Y/N ) l_l*jECD ** J XI 
2 10 IF Xb “N" THEN 7 | 0 
220 IF Xi= M Y m THEN 300 
2 30 PRINT “TRY AGAIN 1 ' : GOTO 200 


400 FOR Z=1 TO N 

410 PRINT Z; AL(Z); BL(Z) 

420 NEXT 

430 GOSUB 1000 

440 GOTO 700 


FOR Y*1 TO P 

FOR Z- 1 -*-20< , (Y- 1 ) TO 20*Y 
PRINT Z; AUZ); B£( Z) 
NEXT Z 
GOSUB 1000 
NEXT Y 

IF 2Q*P » N THEN 700 


7 00 PRINT "OTHAT WAS THE LAST QNEQ U 
710 END 


iooo print * onnnn pRESs any keyq_" 

1010 GET Fit IF FL® 11 ■ THEN 1010 
1020 RETURN 


FOR Z*1+20*P TO N 
PRINT Z; AL(Z); B£(Z) 
NEXT Z 


50 
5 1 

52 

53 
5 4 

55 

56 


60 
6 1 
62 


30 
3 1 
32 


P® INT(N/20) 

IF P® 0 THEM 40 0 
GOTO 500 











PEEK AND POKE 

S3SSS3SSSSSSS 


PEEK 
* *** 

IN BOOK 1, PAGES 25.., WE SPENT SOKE TIME LOOKING AT 
WAYS OF USING THE 'POKE* STATEMENT AND THE NUMBERS 
ASSOCIATED WITH THE SCREEN LOCATIONS AND THE PET 
SYMBOLS. (TABLES 3,4 AND 5). 

THE * PEEK* STATEMENT USES THE SAME SET OF NUMEERS, 
MAINLY, AND IS A WAY OF CHECKING WHETHER OR NOT A 
MEMORY LOCATION IS EMPTY OR HAS A NUMBER IN IT. 

FIRST, POKE A QUESTION-MARK INTO ANY SCREEN 
LOCATION - SAY 33143. THIS IS POSITION (21,P) 

ON DIAGRAM 2. THE NUMBER ASSOCIATED WITH THE 
QUESTION-MARK IS FOUND ON TABLE 3 TO BE 63. 


5 PRINT" 

10 POKE 33148,63 


TRY THIS BEFORE GOING ON. 

NOV SUPPOSE WE WISH TO CHECK THIS ROW ON THE SCREEN, 
THAT IS ROW P ON DIAGRAM 2, FOR THE PRESENCE OF A 
SYMBOL OF ANY KIND. THIS SORT OF CHECKING IS OFTEN 
NECESSARY, IN GAMES FOR EXAMPLE. THE NUMBERS 
ASSOCIATED WITH THIS ROW ON DIAGRAM 5 ARE 

33128 TO 33167 

SO WE PROCEED LIKE THIS* 


20 FOR N« 331 28 TO 33167 
30 A*PEEK(N) 

59 PRINT N,A 

60 NEXT N 






TRY running THIS. THE RESULTS ARE PRINTED ON THE SCREEN 
VERY QUICKLY, AND SOME RUN OFF THE TOP, BUT THE 
IMPORTANT POINT IS STILL CLEAR. IN ALL CASES EXCEPT 
ONE A IS 32. IN THE EXCEPTIONAL CASE IT IS 63. 


• 

• 

33147 

32 

33148 

63 

33149 

32 

• 

• 


NOV PUT IN THE LINE: 


AO IF A » 32 THEN 60 


NOV RUN THE PROGRAM AGAIN. THIS TIME EVERYTHING BUT 
THE ANSVER IS EXCLUDED, THAT IS: 

33148 63 

HOVEVER, VE POKED A QUESTION MARK INTO THE SPACE, AND 
THE •PEEK* ROUTINE HAS PRODUCED THE NUMBER 63. 

VE NEED SOME VAY OF TRANSLATING FROM 63 TO THE 
QUESTION MARK. VE CAN USE ANOTHER PET-BASIC 
FUNCTION TO DO THIS. THE FUNCTION IS 'CHRl'• 

'CHR* IS SHORT FOR •CHARACTER* AND THE DOLLAR<PQUND) 
SIGN INDICATES THAT IT REPRESENTS A STRING. IT IS 
USED TO TRANSLATE CODE-NUMBERS LIKE THOSE ON 
DIAGRAMS 3 AND A BACK INTO SYMBOLS. (SEE TABLE 6). 

THIS FUNCTION IS DESCRIBED IN MORE DETAIL IN THE 
CHAPTER ON STRING FUNCTIONS, VHERE SOME DIFFICULTIES 
ASSOCIATED VITH IT ARE DESCRIBED. IN THIS CASE 
THERE IS NO PROBLEM. 




PUT IN THE LINE 


45 At a CHRt<A> 

50 PRINT Ns A/ At 


AND CHANGE LINE 50 TO 


THE COMPLETE PROGRAM NOV LOOKS LIKE THIS: 


5 PRINT** V 
10 POKE 33148s 63 
20 FOR N= 33128 TO 33167 
30 A= PEEK(N) 

40 IF A * 32 THEN 60 
45 At = CHRtCA) 

50 PRINT Ns As At 
60 NEXT 


MORE ABOUT MOVEMENT 

* ****************** 


TO MOVE A SYMBOL FROM ONE CELL TO ANOTHER ON THE 
PET-SCREENs USING THE * POKE' STATEMENT INVOLVES 
CHANGING THE LOCATION NUMBER IN ONE OF THE 
EIGHT WAYS SHOWN BELOW: 



THE NUMBER PAD ON THE RIGHT OF THE PET KEYBOARD 
LOOKS LIKE THIS: 



7 8 9 
4 5 6 
1 2 3 


IT IS IN* A WAY LOGICAL TO PRESS: 

KEY 8 TO GO UP 
KEY 2 TO GO DOWN 
KEY 6 TO GO RIGHT 
KEY 4 TO GO LEFT 
KEY 9 TO GO UP AND RIGHT 
AND SO ON. 

BEGIN BY CLEARING THE SCREEN. THEN PLACE THE 
CIRCLE (POKE NUMBER 81, IN DIAGRAM 3) IN THE 
CENTRE OF THE SCREEN. CALL IT THE 'HUNTER* 


\\ ^ * * 

10 PRINT V 
100 3 3168 : B-8 1 

120 POKE A, B 


THE NEXT FEW LINES ALLOW YOU TO PRESS ONE OF THE 
KEYS 1 TO 9, REPRESENTING THE DIRECTION IN 
WHICH YOU WISH TO MOVE THE 'HUNTER' 

IN LINE 130 PET CYCLES ROUND IN A LOOP WHILE IT 
WAITS CN A NUMBER DIFFERENT FROM 0 TO BE INPUT. 


130 GET N: IF N=Q THEN 130 

150 IF N*1 THEN A- A+ 39 1 GOTO 120 


AS SOON AS ANOTHER NUMBER IS PRESSED: 

1. PET CHANGES A, THE POSITION NUMBER OF THE 
HUNTER, BY AN APPROPRIATE AMOUNT ACCORDING 
TO THE EARLIER TABLE. (LINES 150 AND ITS 
SUCCEEDING LINES BELOV). 



2. PET THEN GOES TO LINE 120 AND 

POKES THE NEW POSITION OF THE HUNTER. 

THE REST OF THE LINES ARE AS FOLLOWS: 


160 

IF 

N= 2 

THEN 

A*A+40: 

GOTO 

120 

170 

IF 

N= 3 

THEN 

A= A + 4 1 : 

GOTO 

120 

180 

IF 

N = 4 

THEN 

A=A-l : 

GOTO 

1 20 

190 

IF 

N= 5 

THEN 

A= A : 

GOTO 

120 

200 

IF 

N= 6 

THEN 

A= A+1 : 

GOTO 

120 

210 

IF 

N = 7 

THEN 

A= A- 4 1 : 

GOTO 

120 

220 

IF 

N = 8 

THEN 

A=A-4 0 : 

GOTO 

120 

230 

IF 

N= 9 

THEN 

A= A- 39: 

GOTO 

120 


NOW RUN THIS. THE RESULT IS NOT EXACTLY WHAT WAS 
INTENDED. NOT ONLY DOES THE HUNTER MOVE AS 
EXPECTED BUT IT LEAVES A TRAIL BEHIND IT. 

IN OTHER WORDSj THIS IS A PROGRAM FOR DRAWING 
PICTURES ON THE SCREEN. 

IF YOU WISH TO EXPERIMENT WITH THIS, TRY CHANGING 
THE VALUE OF B IN LINE 120T ‘ 

HOWEVER, IF YOU WISH TO RETURN TO THE ORIGINAL 
NOTION OF A MOVING HUNTER, THEN INSERT THE 
LINE MO AS SHOWN BELOV. 


MO POKE A, 32 


THIS NEW LINE, MO, REMOVES EACH POSITION OF 
THE HUNTER BEFORE PLACING THE NEW POSITION. 


IN MANY GAMES, THERE ARE OBSTACLES ON THE SCREEN 
WHICH THE HUNTER MUST TRY TO AVOID. OFTEN THIS 
TAKES THE FORM OF A MAZE. FOR THE PURPOSE OF 
THIS ILLUSTRATION A COUPLE OF WALLS WILL BE 
PLACED ON THE SCREEN, AS FOLLOWS. 




20 

FOR C= 330 08 

TO 33038 

25 

POKE C,102: 

NEXT 

30 

FOP C= 33338 

TO 33367 

35 

POKE C,102: 

NEXT 


AS THE HUNTER MOVES ABOUT THE SCREEN IT MAY BUMP 
AGAINST THE WALLS. THIS MUST BE TESTED FOR AT 
EACH STEP. TO DO THIS, CHANGE LINE 120 AS SHOWN 
BELOV, AND RENAME LINE 120 AS LINE 125. 


120 

D= PEEK(A): 

IF D= 1 0 2 

THEN A 0 0 

125 

POKE A,B 


THE WALL! l" 

A0 0 

PRINT " YOU 

HAVE HIT 


TRY RUNNING THE WHOLE PROGRAM NOW FROM THE 
START. CLEARLY THE POSSIBILITIES ARE NOW 
VERY LARGE. WHAT HAPPEN S NEXT I S UP TO THE 
IMAGINATION OF THE PROGRAMMER. ONE INTERESTING 
TECHNIQUE IS TO AMEND THE PROGRAM SO THAT THE 
HUNTER CONTINUES TO MOVE IN ANY DIRECTION UNTIL 
A NEW DIRECTION KEY IS PRESSED. 

IN THIS SITUATION, AVOIDING THE WALLS OF A 
MAZE IS VERY MUCH MORE DIFFICULT AND IT WILL 
BE NECESSARY TO SLOW DOWN THE SPEED OF MOVEMENT. 




POKE AND A SINE CURVE 

********************* 


THE POKE STATEMENT CAN BE USED TO MAKE A SINE 
CURVE IN AN INTERESTING WAY. A FULL CYCLE OF,THE 
SINE CURVE RUNS FROM 0 TO 2*'Tl . A PERIOD OF TWO 

CYCLES THEREFORE RUNS FROM 0 TO 4* TT , AND THIS 
MAKES A 3ETTER CURVE ON *PET'. 

LET ’JS THEN SUPPOSE THAT THE WIDTH OF THE PET-SCREEN 
IS EXACTLY 4*^ UNITS. 

THERE ARE 40 LOCATIONS ON A LINE ACROSS THE 
SCREEN, SO THERE ARE 39 STEPS, THE FIRST FROM 
LOCATION 1 TO LOCATION 2. SO EACH STEP 
REPRESENTS A LENGTH OF (4* Tf /39) UNITS. 

SO THE OBVIOUS LOOP IS: 


10 FOR A= 0 TO 4* Tt STEP (4* T< /39> 
50 NEXT A 


THE VALUE OF SIN(A) LIES BETWEEN -1 AND +1. 

SO VALUES OF SIN(A) NEED TO BE SCALED UP, IN THIS 
CASE BY 12 (SINCE THE SCREEN IS 25 UNITS HIGH)* 
ALSO, THE WHOLE NWIBEP PART ONLY, NEEDS TO BE 
CONSIDERED. THIS IS DONE IN LINE 20: 


20 Y = IMT(12*SIN(A)) 


THE CURVE BEGINS ON THE MIDDLE ROW, EXTREME LEFT 
(LOCATION CM,1) ON DIAGRAM 2). THE POKE NUMBER 
IS 33248* SO VE POKE THIS LOCATION, SUITABLY 
CHANGED FOR EACH VALUE OF Y. 




THESE VALUES OF Y REPRESENT VERTICAL DISTANCES 
UP AND DOWN THE SCREEN AND EACH UNIT OF VERTICAL 
DISTANCE INVOLVES A DIFFERENCE OF 40 IN THE 
POKE NUMBER. 


THIS LEADS TO THE LINES: 


30 POKE 33248 + (40*Y> ♦ X, 46 
40 X = X+ 1 


SINCE EACH CYCLE OF THE LOOP (LINES 10 AND 50) 
INVOLVES A STEP OF ONE UNIT ACROSS THE SCREEN 
THE VALUE OF X I S INCREASED BY ONE UNIT EACH 
TIME -- LINE 40. 

NOV THE WHOLE PROGRAM: 


1 0 

FOR A = 0 TO 4* Tf STEP 

(4* 'Tf / 39 ) 

20 

Y = INT(12*SIN(A>> 


30 

POKE 33248 ♦ (40*Y> ♦ X* 

46 

40 

X = X+1 


50 

NEXT A 



NOV TRY VARIATIONS ON THIS. FOR EXAMPLE* IN 
LINE 10* CHANGE 4* tf TO ^ OR 2*1T OR 8*lV 
-- IN BOTH PLACES ON THE LINE. 

OP* IN LINE 20* CHANGE SIN(A) TO COSCA) 

OR TO SIN(A)*COS(A) OR TO SIN(2*A)*C0S(A). 

THE POSSIBILITY FOR EXPERIMENT IS THERE IF YOU 
WISH TO USE IT. 






STRINGS 


INTRODUCTION 

************ 


* PET BASIC* HAS A VERY POWERFUL SET OF STRING 
FUNCTIONS. A STRING IS ANY SET OF SYMBOLS, NUMBERS OR 
GRAPHICS. THE MOST NORMAL FORM OF STRING IS AN 
ORDINARY ENGLISH WORD. 

HERE IS AN EXAMPLES 


10 

AE = 

11 HELLO ! ' 

" MY BIRTHDAY IS ON 1 OTH MARCH. 

20 

BE = 

30 

PRINT 

AE, BE 


DIMENSIONS 

********** 

IT IS OFTEN USEFUL TO BE ABLE TO STORE STRINGS IN 
AN ORDERLY MANNER. FOR EXAMPLE IF YOU WISHED TO 
STORE THE 12 MONTHS OF THE YEAR, IT IS BEST TO 
USE A STRING DIMENSION STATEMENT AS 
ILLUSTRATED BELOW. 


TYPE IT AND TRY IT: 

(THE PROGRAM IS PRINTED IN 3 CLEAR 
SECTIONS FOR CLARITY. THE FIRST 
t INPUTS THE NAMES OF THE MONTHS, 

£ THE SECOND MAKES A STOP, AND THE 
THIRD PRINTS THE NAMES OF THE 
MONTHS ON THE SCREEN.) 








10 DIM At<12) 

20 FOR N*1 TO 12 

30 INPUT "INPUT M0NTH22lJEEfl JALCN) 
40 NEXT N ' 

THAT WAS INPUT ROUTINE 


50 PRINT 11 QQPRESS ANY KEYQQ “ 
60 GET Bi : IF BL= 11 “ THEN 60 


7 0 FOP N=* 1 TO 12 
80 PRINT AUN) 

90 NEXT N 

THAT WAS PRINTING ROUTINE 


L EFT t 

* *«** 

THIS IS BEST EXPLAINED USING EXAMPLES: 


PROGRAMS 

PRINTOUT 

1 0 PRINT LEFTt( " BASI C 11 , 1 ) 

B 

20 PRINT LEFT£< M BASIC 11 ,2) 

BA 

30 At » " EDUCATIONAL 1 ’ 

A0 PRINT LEFTt(At* 9) 

EDUCATION 


THAT IS LEFTLCAt* B) MEANS THE FIRST B 
CHARACTERS OF THE STRING AL* STARTING 
ON THE LEFT. 













THE LEFTS. FUNCTION IS OFTEN USED TO TEST INPUT BY 
EXAMINING ITS FIRST LETTER ONLY- 


10 PRINT M DO YOU WISH TO j- " 

20 PRINT * 0010310 BEGIN AGAIN * 

30 PRINT " QO 0 0 0 0 O READ LIST U 
40 PRINT 11 Q0 0 0 0 0 0 SAVE ON TAPE" 
50 INPUT A£ 

60 IF LEFT £( A£.» 1 ) = "b” THEN 100 
70 IF LEFT£(A£, 1) = " R '* THEN 200 
80 IF LEFT£(A£, 1) = '»S" THEN 300 


IN THIS INCOMPLETE PROGRAM THE FIRST LETTER OF 
THE RESPONSE IS EXAMINED AND COMPARED WITH THE 
FIRST LETTER OF EACH POSSIBLE RESPONSE. 

THIS TECHNIQUE IS FOUND MOST OFTEN IN THIS ROUTINE: 


10 INPUT " DO YOU WISH TO PLAY AGAIN 0 0 » tECIT ; A£ 
20 IF LEFT£( A£.» 1 ) = " Y" THEN 100 
30 IF LEFT£<A£, 1) =• 4, N u THEN 200 
40 PRINT u TRY AGAIN" : GOTO 10 


RIGHT! 

****** 

THIS FUNCTION IS VERY SIMILAR TO THE LEFT! 
FUNCTION. THE DIFFERENCE IS OBVIOUS AND IMPLICIT 
IN THE WORD. IN THIS CASE VE START AT THE END OF 
THE STRING AND WORK BACK. 

SOME EXAMPLES NOV FOLLOW: 






PROGRAM 


PRINTOUT 


1 0 

PRINT 

RIGHTU " PET , 1) 

T 

20 

PRINT 

RIGHTS.C '* RETURN" 

TURN 

30 

A£ * " 

ABCD U 


40 

FOR N*1 

TO 4 

D 

50 

PRINT 

RIGHTUAt,N) i NEXT 

CD 




BCD 




ABCD 


MIDt 
* *** 

THIS IS PROBABLY THE MOST USEFUL OF THE STRING 
FUNCTIONS AND IN SOME WAYS THE MOST SOPHISTICATED. 

SOME EXAMPLES TO BEGIN WITH: 


PROGRAM 

PRINTOUT 

20 PRINT MI DL( “DRONES" ,3,2) 

ON 

30 PRINT MIDtC 11 DRONES 11 ,3,4) 

ONES 

40 PRINT MI DL( " DRONES M ,4) 

N 

50 BL » 11 ZYXVV W 

Y 

60 FOR P « 1 TO 4 

YX 

70 PRINT MIDi(Bt,2, P) I NEXT 

YXV 


YXVV 











SO MI D£( At, 4* 6) MEANS A STRING BEGINNING WITH THE 
4TH CHARACTER OF At AND CONSISTING OF 6 CHARACTERS. 

HERE IS A MORE COMPLEX USE OF THIS FUNCTION. 

IN THIS CASE WE INPUT A NUMBER BETWEEN I AND 7 
R EPRESENTING A DAY IN THE WEEK. 

SUNDAY IS 1 

MONDAY IS 2 , AND SO ON. 


10 INPUT M INPUT DAY AS A NUMBERS 3 * fTTHT! n : n 


VE THEN CREATE A LONG STRING MADE UP OF THE FIRST 
3 LETTERS OF ALL SEVEN DAYS, AS FOLLOWS; 


30 D£= W • • SUMMONTUEWEDTHUFRI SAT** 


(NOTE THAT THERE ARE TWO SPACES BETWEEN THE QUOTATION 
MARKS AND SUN - REPRESENTED BY DOTS HERE - AND 
THESE COUNT AS CHARACTERS.) 

NOW USE THE MIDI FUNCTION TO TRANSLATE THE NUMBER 
•D # INTO A THREE-LETTER VERSION OF THE DAY 
IT REPRESENTS. 


50 AL = MI DEC D£, 3*D, 3) 


SO, FOR EXAMPLE, WHEN D= 3 , THE DAY IS TUESDAY. 
THEN At BEGINS AT THE 9TH CHARACTER OF THE LONG 
STRING IN LINE 30 AND IS 3 CHARACTERS LONG; THAT 
IS At IS • TUE* 





NOV PUT IN A PRINT LINE 


70 PRINT AL 


THE WHOLE ROUTINE LOOKS LIKE THIS: 


1 0 

INPUT 

* INPUT DAY AS A NUMBER] 1* DJCJ] *5 D 

30 

DL = 

" ..SUMMONYUEVEDTHUFRISAT W 

50 

AL = i 

MI DL( DL, 3*D, 3) 

70 

PRINT 

AL 


A SIMILAR ROUTINE FOR THE MONTHS CAN BE PUT ALONG WITH 
THIS, AND VARIOUS INTERESTING FORMS OF DATE PRINTOUT 
ARE THEN POSSIBLE- 


FINALLY, A GRAPHICS ROUTINE USING THE MIDt FUNCTION. 

FIRST SET T Tr> A STRING MADE U*> OF THE FOUR 
'CURSOR MOVEMENT SYMBOLS. IN THIS CASE WE 
HAVE INCLUDED THE CVRSDR RIGHT SYMBOL 
TWICE BECAUSE IT SEEMED TO IMPROVE THE 
FINAL RESULT. 


5 PRINT 1 ' V " 
10 AL =“0 0 


THEN USE THE RANDDM NUMBER FUNCTION TO PRODUCE 
A NUMBER BETWEEN 1 AND 5 (INCLUSIVE). 


30 B * INT(5*RND(2)+1) 




THEN USE B AND THE MIDL FUNCTION TO CHOOSE ONE 
OF THE 5 CURSOR MOVEMENTS IN At. 


40 C£ * MI D£( A£, B, 1) 


NOV PUT IN A STAR AS A MOVING SYMBOL AND AN EXTRA 
’CURSOR LEFT* SYMBOL AS FOLLOWS: 


50 PRINT Ct 11 * [IJ W ; 


THE SEMI-COLON ENSURES THAT THE SYMBOLS CAN APPEAR 
ON THE SAME HORIZONTAL LINE. NOV PUT IN A LOO? 


80 GOTO 10 


NOV TRY RUNNING THIS. 

THE NEXT TWO LINES PUT IN A SECOND SYMBOL AND A 
SMALL DELAY (LINE 60> TO MAKE SURE THAT BOTH 
SYMBOLS ARE VISIBLE. THE SYMBOL CHOSEN IS THE 
FULL STOP* BUT TRY A VARIETY OF SYMBOLS AND WATCH 
THE RESULTS. 


60 FOR Ns 1 TO 10 0 : NEXT 
70 PRINT 11 .Cft 


FINALLY, CHANGE LINE 70 AS SHOWN BELOV. THERE IS A 
SPACE AFTER ’ R* THE REVERSE FIELD SYMBOL. 


70 PRINT 11 R 













Gri'Pi 

a 5»y 


THIS FUNCTION I £ USED TO TRANSLATE NUMBFftS (SEE 
DIAGRAM 6 > INTO " CHARACTERS * Qf; STRINGS OF 
1 CHARACTERS’. THEBE 1C NTi VERY OBVIOUS LOGIC 
ASSOCIATED WITH THESE AN LG ’ JN TO * T CM AT ELY , ‘*H 'GY 
DO NpT ALL COINCIDE WITH SHE *PQK£Y NUMBERS 
C 1AI&ES 3 AND 4). AS WELL AS THIS SOME OF USE 
WUMBERS ‘0 TO 2* " AND r 128 TO 159 * HAVE 
SPECIAL CONtfOL FUNCTIONS ’ASSOCIATED WITH THEM 
AND "THERE ISHlSOMF. DISCUSSION GF THESE BELOV* 

4 

HERE IS AN EXAMPLE? 



SO DIM N<2.0> 

pjiMrV 1 * 

"?j?0 FpR A=i TO 10 i HEAD N;A5 { tfEV.f 
«S E&TA1 73-46, 3?/7 3* 8 2/ C9, 76* 6 b* 76,'„*3 
50 FOR A* I TO 10 
60 B=N(A) 

70 PRINT CHftECB)* 

80 NEXT 


I 

$ 

5 


I 

i 

! 

i 

i 


fIC THIS CASE LINE 70 TRANSLATES THE NUMBERS IN • 

L IMS’ 40 INTO. THE CHARACTERS: ¥ tt. IRELAND* 

THIS MAY 5EFM A VER V TRIVIAL AND SILLY WAY TO 
PRODUCE A SIMPLE PHRASE- i*U? IT ILLUSTRATES THE 
METHOD* THE CHIU FUNCTION CAN BE USED WITH 
* PEEK AND POKE * TO MAKE SUM E VERY INTERESTING 
THINGS HAPPEN * SEE FOR EXAMPLE PAGE n, 

D.' AltRAri 6' REPRESENTS AN ATTEMPT TO MAKE THE 
NUMBERS ASSOCIATED WITH THE 01*1 FUNCTION CL FAB* 

THE FIRST COLUMN ON THE LEF~ CONTMNS 'LiE NUMBERS 
7 TO 31* THESE DO NOT CORRESPOND TO AMY GF THE 



•PET SYMBOLS* OR CHARACTERS; SO IF USED IN 
ASSOCIATION WITH THE * PEEK * STATEMENT THEN EACH 
NUMBER MUST HAVE 64 ADDED TO IT. THAT IS# IP 

A=PEEK( B) AND A LIES BETWEEN 0 AND 31# THEN 

A£= CHR £(A+64) 


THE SECOND COLUMN CONTAINS THE NUMBERS 64 TO 95* 
THESE CORRESPOND TO THE LETTERS AND SYMBOLS AS 
SHOWN. SO IF Z = 7 0 THEN CHR£(Z) = F 

HOWEVER# IF THESE ARE USED WITH THE PEEK 
STATEMENT# THEN EACH NUMBER MUST HAVE 32 ADDED TO I 

THAT IS A£r CHRLCA+32) 


THE THIRD COLUMN OF NUMBERS# THAT IS 128 TO 159# 
IS LIKE COLUMN ONE IN THAT THE NUMBERS DO NOT 
RELATE TO ANY PET SYMBOLS. 


THE FOURTH COLUMN OF NUMBERS# 192 TO 223# 

RELATES TO THE 'SHIFT KEY’ VERSION OF THOSE IN 
COLUMN 2- THE LAST FOUR COLUMNS BEHAVE SIMILARILY 
WITH THE REMAINING SYMBOLS AND THEIR 'SHIFT KEY* 
VERSIONS EACH REPRESENTED BY TWO NUMBERS- 


CHRS. AND CONTROL KEYS 

********************* 


SOME OF THE NUMBERS IN THE COLUMNS '0 TD 31' 
AND '128 TO 159' ARE USED BY PET FOR THOSE 
PET KEYS THAT HAVE ALREADY BEEN DISCUSSED TO 
SOME EXTENT ON PAG E V*. THESE ARE NUMBERED 
1 2# 13# 14# 15#59 AND 60 IN DIAGRAM 1• A LIST 
OF THESE NOW FOLLOWS. 



• CHR£ CONTROL KEYS 


CHRK19) 
CHRK147) 

... 

CURSOR 

CLEARS 

HOME 

SCREEN 


CHRK 17) 


CURSOR 

DOWN 


CHRK145) 

— 

CURSOR 

UP 


CHRK 29) 


CURSOR 

RIGHT 


CHR£<157) 

— 

CURSOR 

LEFT 


CHRK20) 


DELETE 



CHR£(148) 

— 

INSERT 



CHRK 18) 

— 

REVERSE 

: FIELD 


CHRK13) 


CARRIAGE RETURN 


CHR £( 141) 

— 

SPACE 




A PARTICULAR1LY USEFUL CHRl NUMBER IS 34. THAT IS 
THE ONE THAT RETURNS A 'QUOTATION MARK*. 

THIS MAKES IT POSSIBLE TO GET PET TO PRINT QUOTATION 
MARKS DURING THE RUN OF A PROGRAM. AN EXAMPLE FOLLOWS: 


10 PRINT H MY NAME IS" CHR£ ( 34) 11 SEAMUS 11 CHRK 34) 


THE OUTPUT FROM THIS IS: 


MY NAME IS " SEAMUS" 












THE * VAL * FUNCTION 

* ****************** 


MORE OFTEN THAN NOT STRINGS ARE MADE UP ENTIRELY 
OF LETTERS AMD ARE SIMPLE ENGLISH WORDS. HOWEVER IT 
IS NOT NECESSARY FOR THIS TO BE SO. A STRING 
CAN BE MADE UP ENTIRELY GF NUMERALS. THE 
DISTINCTION BETWEEN THE NUMBER 167 AND THE 
STRING *‘167" IS THAT THE STRING HAS QUOTATION 
MARKS AROUND IT. THAT IS: 


A » 47 

A 

15 

A 

NUMBER 

At = *A?" 

A£ 

IS 

A 

STRING 


THE * VAL ‘ FUNCTION RETURNS A NUMBER ACCORDING TC 
THE FOLLOWING RULES: 

IF AS. IS MADE UP OF LETTERS* OR 3EGINS WITH LETTERS 
THEN VAL CAL) ?. S EQUAL TO S« 

SOME EXAMPLES: 


At 
AL 
A £ 


J Q S 

H JBO 0?" 
** AS3 w 


v AL v A t, t 

VALCAL) - 
VALCAL) * 


HOWEVER* IF THE STRING Al 15 HADE UP GF NUMERALS OP 
BEGINS WITH A NUMERAL* THEN VALCAL) IS EQUAL TO THE 
VALUE OF THAT NUMERAL. 

SOME EXAMPLES: 


S A L - ft 2 ' 
i* AS. * ”?SKV' 
J AL * u ftX3Y n 


VAL CAE 5 ~ 43 $ 

VAL (AL - 7 c { 

V AL CAD « ft | 


L 





THIS FUNCTION IS USEFUL WHEN CHECKING INPV 
FIRST TRY THIS LINE: 


YOUR NAME • rAt 


NOW 1JIWT JOE FOLLOWED BY RETURN * 

°ET ACCEPTS THIS QUITE HA W PILY* AS MIGHT 
HAVE BEEN EXPECTED* NOW RUM IT AGAIN 
AND THIS TIME PUT IN 7R . 

UNFORTUNATELY.. PET CANNOT DISTINGUISH 
THIS FROM A NAME* AN0 ACCEPTS ST 
JUST AS K/tPPlLV* 

SO PUT IN A NEW LINE LIKE THIS: 


20 XF UAL CAE) <> 0 THEN l G 


NOV TRY PUTTING IN A NUMBER AMD PET WILL 
SEND YOU BACK TO LINE IP AND REPEAT THE 
ORIGINAL QUESTION. 






DIAGRAM !• PET KEYBOARD ritli reference umbers* 























PET KEYBOARD with Peek and Poke Symooi Numbers 

The bottom number is the symbol; the second the 'shift' or upper symbol; the third the symbol 
field? the fourth the upper symbol in reverse field* 
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**************** 
* POKE NUMBERS * 
**************** 


SIGN SHIFT REV REV.S SIGN SHIFT REV REV.S 


~r “ 

:S5 = 

= SS = 

====== 



: = = = 



= 3 = 33 

© 

0 

64 

128 

192 


32 

96 

160 

224 

A 

1 

65 

129 

193 

! 

33 

97 

161 

225 

B 

2 

66 

130 

194 

ii 

34 

98 

162 

226 

C 

3 

67 

131 

195 

# 

35 

99 

163 

227 

D 

4 

68 

1 32 

196 

$ 36 

100 

164 

228 

E 

5 

69 

133 

197 

% 

37 

101 

165 

229 

F 

6 

70 

1 34 

198 

& 

38 

1 02 

166 

230 

G 

7 

71 

135 

199 

t 

39 

103 

167 

231 

H 

8 

72 

136 

200 

( 

40 

1 04 

168 

232 

i 

9 

73 

137 

201 

) 

41 

105 

169 

233 

j 

10 

74 

1 38 

202 

♦ 

42 

1 06 

170 

234 

K 

11 

75 

139 

203 

+ 

43 

107 

171 

235 

L 

12 

76 

140 

204 

* 

44 

1 08 

172 

236 

M 

13 

77 

141 

205 

- 

45 

1 09 

173 

237 

N 

14 

78 

142 

206 

• 

46 

110 

174 

238 

□ 

15 

79 

143 

207 

/ 

47 

1 1 1 

175 

239 

P 

16 

80 

144 

208 

0 

48 

112 

176 

240 

Q 

17 

81 

145 

209 

1 

49 

113 

177 

241 

R 

18 

82 

146 

210 

2 

50 

114 

178 

242 

S 

19 

83 

147 

21 1 

3 

51 

115 

179 

243 

T 

20 

84 

148 

212 

4 

52 

116 

180 

244 

U 

21 

85 

149 

213 

5 

53 

117 

181 

245 

V 

22 

86 

150 

214 

6 

54 

1 18 

182 

246 

W 

23 

87 

151 

215 

7 

55 

119 

183 

247 

X 

24 

88 

152 

216 

8 

56 

120 

184 

248 

Y 

25 

89 

153 

217 

9 

57 

121 

185 

249 

Z 

26 

90 

154 

218 

• 

• 

58 

122 

186 

250 

c 

27 

91 

155 

219 

• 

* 

59 

123 

187 

251 

\ 

28 

92 

156 

220 

< 

60 

124 

188 

252 

3 

29 

93 

157 

221 

= 

61 

125 

189 

253 

t 

30 

94 

158 

222 

> 

62 

126 

190 

254 

4- 

31 

95 

159 

223 

7 

63 

127 

191 

255 
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CHR£ NUMBERS 
************* 


Col.1 

Col.2 

Col. 3 

Col.4 

WHS 
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